home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr47 / 80x0393.zip / MODEX_QB.INC < prev    next >
Text File  |  1993-06-20  |  1KB  |  31 lines
  1. 'This is the Include file for ModeX.OBJ
  2.  
  3. 'For use with QuickBASIC 4.5, PDS 7.1 or VB/DOS 1.0
  4.  
  5. CONST Mode320x200 = 0, Mode320x400 = 1
  6. CONST Mode360x200 = 2, Mode360x400 = 3
  7. CONST Mode320x240 = 4, Mode320x480 = 5
  8. CONST Mode360x240 = 6, Mode360x480 = 7
  9.  
  10.  
  11. DECLARE FUNCTION SET.VGA.MODEX% ALIAS "SET_VGA_MODEX" (BYVAL ModeType%, BYVAL MaxXPos%, BYVAL MaxYpos%, BYVAL Pages%)
  12. DECLARE FUNCTION SET.MODEX% ALIAS "SET_MODEX" (BYVAL Mode%)
  13.  
  14. DECLARE SUB CLEAR.VGA.SCREEN ALIAS "CLEAR_VGA_SCREEN" (BYVAL ColorNum%) 
  15. DECLARE SUB SET.POINT ALIAS "SET_POINT" (BYVAL Xpos%, BYVAL Ypos%, BYVAL ColorNum%) 
  16. DECLARE FUNCTION READ.POINT% ALIAS "READ_POINT" (BYVAL Xpos%, BYVAL Ypos%) 
  17. DECLARE SUB FILL.BLOCK ALIAS "FILL_BLOCK" (BYVAL Xpos1%, BYVAL Ypos1%, BYVAL Xpos2%, BYVAL Ypos2%, BYVAL ColorNum%) 
  18. DECLARE SUB DRAW.LINE ALIAS "DRAW_LINE" (BYVAL Xpos1%, BYVAL Ypos1%, BYVAL Xpos2%, BYVAL Ypos2%, BYVAL ColorNum%)
  19.  
  20.  
  21. DECLARE SUB SET.ACTIVE.PAGE ALIAS "SET_ACTIVE_PAGE" (BYVAL PageNo%) 
  22. DECLARE FUNCTION GET.ACTIVE.PAGE% ALIAS "GET_ACTIVE_PAGE"
  23.  
  24. DECLARE SUB SET.DISPLAY.PAGE ALIAS "SET_DISPLAY_PAGE" (BYVAL PageNo%) 
  25. DECLARE FUNCTION GET.DISPLAY.PAGE% ALIAS "GET_DISPLAY_PAGE"
  26.  
  27. DECLARE SUB SET.DAC.REGISTER ALIAS "SET_DAC_REGISTER" (BYVAL RegNo%, BYVAL Red%, BYVAL Green%, BYVAL Blue%)
  28. DECLARE SUB GET.DAC.REGISTER ALIAS "GET_DAC_REGISTER" (BYVAL RegNo%, Red%, Green%, Blue%)
  29.  
  30. DECLARE SUB SET.WINDOW ALIAS "SET_WINDOW" (BYVAL XOffset%, BYVAL YOffset%)
  31.